Public Class Projeto
    Private strNome As String
    Private strId As String
    Private lstEscopo As List(Of Escopo)

    Public Sub New(ByVal strNome As String, ByVal strId As String)
        Me.strNome = strNome
        Me.strId = strId
    End Sub

    Public Sub setNome(ByVal Nome As String)
        strNome = Nome
    End Sub

    Public Function getNome() As String
        getNome = strNome
    End Function

    Public Sub setId(ByVal Id As String)
        strId = Id
    End Sub

    Public Function getId() As String
        getId = strId
    End Function

    Public Sub setListEscopo(ByVal Escopo As List(Of Escopo))
        lstEscopo = Escopo
    End Sub

    Public Function getListEscopo() As List(Of Escopo)
        getListEscopo = lstEscopo
    End Function

    Public Property Nome() As String
        Get
            Return Me.strNome
        End Get
        Set(ByVal Value As String)
            Me.strNome = Value
        End Set
    End Property

    Public Property Id() As String
        Get
            Return Me.strId
        End Get
        Set(ByVal Value As String)
            Me.strId = Value
        End Set
    End Property


End Class
